

<script language="SpeedScript">





  /* PREPROCESSOR Definitions */



  DEF INPUT PARAMETER a-lang     AS    INTEGER             NO-UNDO.                               

                                 

  DEF VAR lab-bouton AS   CHARACTER EXTENT 5               NO-UNDO.

  DEF VAR i          AS   INTEGER                          NO-UNDO.



  FIND erreur WHERE erreur.noerr = 100019

                AND erreur.lang  = a-lang NO-LOCK NO-ERROR.

</script>

  

  <input type="submit" value="`entry(5,erreur.libel)`" name="navigue" />



